home *** CD-ROM | disk | FTP | other *** search
/ Flybox Trout (Edition 1) / Flybox Trout (Edition 1).iso / Setup / Support / FlyBox.swf / scripts / DefineSprite_210 / frame_20 / DoAction.as
Encoding:
Text File  |  2002-04-15  |  792 b   |  34 lines
  1. if(eval("Result1:FlyID") ne "")
  2. {
  3.    tellTarget("Result" + CurSelected)
  4.    {
  5.       gotoAndStop(1);
  6.    }
  7.    StartFrom += 1;
  8.    CurSelected -= 1;
  9.    tellTarget("Result" + CurSelected)
  10.    {
  11.       gotoAndStop(2);
  12.    }
  13.    a = 0;
  14.    while(22 >= a)
  15.    {
  16.       set("Result" + a + ":FlyID",eval("_root:Result" + (a + StartFrom) + "_FlyID"));
  17.       FName = eval("_root:Result" + (a + StartFrom) + "_FlyName");
  18.       if(11 < length(FName))
  19.       {
  20.          FName = FName.substr(1,10) + "...";
  21.       }
  22.       set("Result" + a + ":FlyName",FName);
  23.       if(eval("_root:Result" + (a + StartFrom) + "_FlyID") ne "")
  24.       {
  25.          setProperty("Result" + a, _visible, 1);
  26.       }
  27.       else
  28.       {
  29.          setProperty("Result" + a, _visible, 0);
  30.       }
  31.       a++;
  32.    }
  33. }
  34.